home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 February / Macworld (1999-02).dmg / Games World / SharewareGames / Xconq 7.2.2 / lib / pearl.g < prev    next >
Text File  |  1998-05-22  |  1KB  |  67 lines
  1. (game-module "pearl"
  2.   (title "Pearl Harbor")
  3.   (blurb "Japan falls upon Pearl Harbor unexpectedly")
  4.   (base-module "ww2-div-pac")
  5.   (variants (see-all true))
  6.   )
  7.  
  8. (game-module (instructions (
  9.   "This module is an introduction to the division/theater-level"
  10.   "Pacific game.  The Japanese fall upon Pearl Harbor and sink"
  11.   "as many ships as possible, while the Americans sit there and"
  12.   "take it."
  13.   )))
  14.  
  15. (set initial-date "7 Dec 1941")
  16.  
  17. (set last-turn 2)
  18.  
  19. (set synthesis-methods nil)
  20.  
  21. ;; (should use restriction of Pacific map)
  22.  
  23. (area 30 20 (terrain
  24.   "30a"
  25.   "30a"
  26.   "30a"
  27.   "30a"
  28.   "30a"
  29.   "30a"
  30.   "30a"
  31.   "30a"
  32.   "30a"
  33.   "9ac20a"
  34.   "13a2c15a"
  35.   "16ac13a"
  36.   "18ac11a"
  37.   "20ac9a"
  38.   "20a2c8a"
  39.   "21ac8a"
  40.   "30a"
  41.   "30a"
  42.   "30a"
  43.   "30a"
  44.   ))
  45.  
  46. (town 14 9 1 (n "Honolulu") (sym honolulu))
  47. (airbase 14 9 1 (in honolulu))
  48. (bb 14 9 1 (n "Arizona") (in honolulu) (acp 0))
  49. (bb 14 9 1 (n "California") (in honolulu) (acp 0))
  50. (bb 14 9 1 (n "Maryland") (in honolulu) (acp 0))
  51. (bb 14 9 1 (n "Nevada") (in honolulu) (acp 0))
  52. (bb 14 9 1 (n "Oklahoma") (in honolulu) (acp 0))
  53. (bb 14 9 1 (n "Pennsylvania") (in honolulu) (acp 0))
  54. (bb 14 9 1 (n "Tennessee") (in honolulu) (acp 0))
  55. (bb 14 9 1 (n "West Virginia") (in honolulu) (acp 0))
  56.  
  57. (ca 8 18 2 (n "Tone"))
  58. (dd 8 18 2 (n "Kagero"))
  59. (cv 8 18 2 (n "Akagi"))
  60. (cv 8 18 2 (n "Hiryu"))
  61. (cv 8 18 2 (n "Kaga"))
  62. (cv 8 18 2 (n "Shokaku"))
  63. (cv 8 18 2 (n "Soryu"))
  64. (cv 8 18 2 (n "Zuikaku"))
  65. (bb 8 18 2 (n "Hiei"))
  66. (bb 8 18 2 (n "Kirishima"))
  67.